unit IDataHelper;

interface
uses
  SysUtils, Classes, DB,DataCommon,Uni;
type

   IDataDm=interface
     ['{31C846D1-159D-4E50-B0DE-997364C22079}']
    procedure SetIndex(Ix:TConnIndex);
    function  GetIndex:TConnIndex;
    Property  ConnIndex:TConnIndex read GetIndex write SetIndex;

    procedure SetQueryText(qrytxt:String);

    function  GetDataSet:TDataSet;overload;
    function  GetDataSet(qrytxt:string):TDataSet;overload;

    function GetQuery:TUniQuery;
   end;

implementation


end.
